Shareware Grab Bag/Shareware Grab Bag.iso/003/db3plsar.arc/CUSTEDIT.FMT

Text File | 1985-10-14 | 1.4 KB | 46 lines

************************************** (B:CUSTEDIT.FMT)
@ 1,1 SAY "----------------------------------- Jay's ì
-------------------------------------"
@ 1,25 SAY MTITLE
@ 3,1 SAY 'Acct # '
@ 3,8 SAY ACCT
@ 3,13 SAY 'Attention ' GET ATTN
@ 3,50 SAY 'Salesman ' GET SALES
@ 4,50 SAY 'H = House'
@ 5,50 SAY 'D = Dick'
@ 6,50 SAY 'C = Charles'
@ 5,1 SAY 'Name       ' GET NAME
@ 7,1 SAY 'Address    ' GET ADDRESS
@ 9,1 SAY 'City       ' GET CITY
@ 9,50 SAY 'State ' GET STATE
@ 9,63 SAY 'Zip ' GET ZIP
@ 11,1 SAY 'Phone      ' GET PHONE
@ 11,50 SAY 'Terms ' GET TERMS
@ 13,1 SAY 'Discount   ' GET DISC
@ 13,50 SAY 'Credit limit ' GET CRLMT
@ 14,1 SAY ì
'-----------------------------------------------------------------ì
--------------'
@ 15,1 SAY 'Last check number' GET CHKNO
@ 15,32 SAY 'Amt. last check' GET LSTPAY
@ 15,60 SAY 'Chk. date' GET NEWDATE
@ 17,1 SAY 'Unapplied credits ' GET UCREDIT
@ 19,1 SAY 'Net Due'
@ 20,0 SAY STR(NET,8,2)
@ 19,17 SAY '+30'
@ 20,11 SAY OLD_30
@ 19,31 SAY '+45'
@ 20,25 SAY OLD_45
@ 19,46 SAY '+60'
@ 20,40 SAY OLD_60
@ 19,55 SAY 'Payments YTD'
@ 20,57 SAY ALLPAY GET ALLPAY
@ 21,1 SAY ì
'-----------------------------------------------------------------ì
--------------'
@ 22,1 SAY 'Press Ctrl W when finished       *      Use arrows and Pg ì
Up/Pg Dn keys to scan'
@ 23,1 SAY ì
'-----------------------------------------------------------------ì
--------------'